﻿Public Class Form_Main

    Private Sub ĐăngNhậpToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Form_dangnhap.MdiParent = Me
        Form_dangnhap.Show()
    End Sub

    Private Sub ĐăngXuấtToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ĐăngXuấtToolStripMenuItem.Click
        For i As Integer = Me.MdiChildren.Length - 1 To 0 Step -1
            Me.MdiChildren(i).Close()
        Next
        Form_dangnhap.Show()
        Me.Close()
        For i As Integer = MdiChildren.Length - 1 To 0 Step -1
            MdiChildren(i).Close()
        Next
    End Sub
End Class
